home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 1 / Cream of the Crop 1.iso / PROGRAM / CUJ9209.ARJ / 1009070A < prev    next >
Text File  |  1992-05-11  |  192b  |  12 lines

  1.  
  2. short calculate_net(net, N, w, x)
  3.    short *net, N, w[], x[];
  4. {
  5.    short i;
  6.    *net = 0;
  7.    for(i=0; i<N+1; i++){
  8.       *net = *net + w[i]*x[i];
  9.    }
  10. }  /* ends calculate_net */
  11.  
  12.